object Form1: TForm1
  Left = 211
  Top = 244
  Width = 1077
  Height = 458
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object FDicGrid1: TFDicGrid
    Left = 176
    Top = 88
    Width = 377
    Height = 193
    Columns = <
      item
        ButtonStyle = cbsEllipsis
        Expanded = False
        FieldName = 'BM'
        Title.Caption = #32534#30721
        Width = 164
        Visible = True
        DicSearch = True
        DicSearchCols = <>
        SearchClassName = 'TFormDicSearchBase'
        FieldBM = 'BM'
        FieldMC = 'MC'
        FieldPYM = 'PYM'
        FieldWBM = 'WBM'
        BeforeDicSearch = FDicGrid1Columns0BeforeDicSearch
        AfterDicSearch = FDicGrid1Columns0AfterDicSearch
      end>
    DataSource = DataSource1
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    LineColor = clGray
    UseMultiTitle = False
    BevelFlatColor = clBlack
    Columns = <
      item
        ButtonStyle = cbsEllipsis
        Expanded = False
        FieldName = 'BM'
        Title.Caption = #32534#30721
        Width = 164
        Visible = True
        DicSearch = True
        DicSearchCols = <>
        SearchClassName = 'TFormDicSearchBase'
        FieldBM = 'BM'
        FieldMC = 'MC'
        FieldPYM = 'PYM'
        FieldWBM = 'WBM'
        BeforeDicSearch = FDicGrid1Columns0BeforeDicSearch
        AfterDicSearch = FDicGrid1Columns0AfterDicSearch
      end>
  end
  object FDBDicEdit1: TFDBDicEdit
    Left = 216
    Top = 16
    Width = 121
    Height = 19
    TabOrder = 1
    SelectedColor = clYellow
    EditLabel.Width = 61
    EditLabel.Height = 13
    EditLabel.Caption = 'FDBDicEdit1'
    EditLabel.LabelPosition = lpLeft
    EditLabel.LabelSpacing = 3
    SearchClassName = 'TFormDicSearchBase'
    DicSearch = True
    DicSearchCols = <>
    FieldBM = 'BM'
    FieldMC = 'MC'
    FieldPYM = 'PYM'
    FieldWBM = 'WBM'
  end
  object ComboBox1: TComboBox
    Left = 176
    Top = 64
    Width = 145
    Height = 21
    ItemHeight = 13
    TabOrder = 2
    Text = 'ComboBox1'
  end
  object FDicEdit1: TFDicEdit
    Left = 400
    Top = 32
    Width = 121
    Height = 19
    ButtonVisible = True
    EditLabel.Width = 46
    EditLabel.Height = 13
    EditLabel.Caption = 'FDicEdit1'
    EditLabel.LabelPosition = lpLeft
    EditLabel.LabelSpacing = 3
    SelectedColor = clYellow
    TabOrder = 3
    SearchClassName = 'TFormDicSearchBase'
    DicSearch = True
    DicSearchCols = <>
    DisplayVal = dvMC
    FieldBM = 'BM'
    FieldMC = 'MC'
    FieldPYM = 'PYM'
    FieldWBM = 'WBM'
  end
  object DataSetList: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 640
    Top = 96
  end
  object DataSource1: TDataSource
    DataSet = DataSetList
    Left = 640
    Top = 152
  end
  object DataSetZD: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 712
    Top = 96
  end
end
